home *** CD-ROM | disk | FTP | other *** search
/ EnigmA Amiga Run 1997 April / EnigmA AMIGA RUN 17 (1997)(G.R. Edizioni)(IT)[!][issue 1997-04][EAR-CD].iso / EARCD / biz / demo / Reflections4De.lha / Ref4Demo / skripte.lha / kopf_2.skr < prev    next >
Text File  |  1996-08-10  |  6KB  |  211 lines
  1. REFSKRIPT
  2.  
  3. OBJ_NEW KOPF2 6
  4. GET_RESULT create_name
  5.  
  6. PKL_ADD KOPF2
  7. PLOT_SCHRAEG
  8.  
  9. ;********Punkte erzeugen************
  10.  
  11. GEO_new_pt create_name
  12. GET_RESULT res
  13. GEO_SET_PT create_name  res -14.000000 15.000000 0.000000
  14. PRINT Punkt 0
  15. GEO_new_pt create_name
  16. GET_RESULT res
  17. GEO_SET_PT create_name  res -14.696030 14.514892 0.000000
  18. GEO_new_pt create_name
  19. GET_RESULT res
  20. GEO_SET_PT create_name  res -15.720922 13.881990 0.000000
  21. GEO_new_pt create_name
  22. GET_RESULT res
  23. GEO_SET_PT create_name  res -16.812014 13.002799 0.000000
  24. GEO_new_pt create_name
  25. GET_RESULT res
  26. GEO_SET_PT create_name  res -17.706640 11.778815 0.000000
  27. GEO_new_pt create_name
  28. GET_RESULT res
  29. GEO_SET_PT create_name  res -18.174395 10.034627 0.000000
  30. GEO_new_pt create_name
  31. GET_RESULT res
  32. GEO_SET_PT create_name  res -18.296293 7.459840 0.000000
  33. GEO_new_pt create_name
  34. GET_RESULT res
  35. GEO_SET_PT create_name  res -18.220308 4.536802 0.000000
  36. GEO_new_pt create_name
  37. GET_RESULT res
  38. GEO_SET_PT create_name  res -18.077768 1.856507 0.000000
  39. GEO_new_pt create_name
  40. GET_RESULT res
  41. GEO_SET_PT create_name  res -18.175341 1.640804 0.000000
  42. GEO_new_pt create_name
  43. GET_RESULT res
  44. GEO_SET_PT create_name  res -18.311668 1.324247 0.000000
  45. GEO_new_pt create_name
  46. GET_RESULT res
  47. GEO_SET_PT create_name  res -18.218874 0.608129 0.000000
  48. GEO_new_pt create_name
  49. GET_RESULT res
  50. GEO_SET_PT create_name  res -17.664961 -0.818645 0.000000
  51. GEO_new_pt create_name
  52. GET_RESULT res
  53. GEO_SET_PT create_name  res -16.725306 -3.033884 0.000000
  54. GEO_new_pt create_name
  55. GET_RESULT res
  56. GEO_SET_PT create_name  res -15.487363 -5.586572 0.000000
  57. GEO_new_pt create_name
  58. GET_RESULT res
  59. GEO_SET_PT create_name  res -14.015391 -7.978970 0.000000
  60. GEO_new_pt create_name
  61. GET_RESULT res
  62. GEO_SET_PT create_name  res -12.383716 -10.250748 0.000000
  63. GEO_new_pt create_name
  64. GET_RESULT res
  65. GEO_SET_PT create_name  res -10.532643 -12.515534 0.000000
  66. GEO_new_pt create_name
  67. GET_RESULT res
  68. GEO_SET_PT create_name  res -8.322824 -14.355317 0.000000
  69. GEO_new_pt create_name
  70. GET_RESULT res
  71. GEO_SET_PT create_name  res -5.496342 -15.359697 0.000000
  72. GEO_new_pt create_name
  73. GET_RESULT res
  74. GEO_SET_PT create_name  res -1.645630 -15.492480 0.000000
  75. GEO_new_pt create_name
  76. GET_RESULT res
  77. GEO_SET_PT create_name  res 2.236639 -15.210036 0.000000
  78. GEO_new_pt create_name
  79. GET_RESULT res
  80. GEO_SET_PT create_name  res 5.000000 -15.000000 0.000000
  81. GEO_new_pt create_name
  82. GET_RESULT res
  83. GEO_SET_PT create_name  res 11.000000 -14.500000 0.000000
  84. GEO_new_pt create_name
  85. GET_RESULT res
  86. GEO_SET_PT create_name  res 14.387790 -14.345844 0.000000
  87. GEO_new_pt create_name
  88. GET_RESULT res
  89. GEO_SET_PT create_name  res 17.499418 -13.804180 0.000000
  90. GEO_new_pt create_name
  91. GET_RESULT res
  92. GEO_SET_PT create_name  res 18.614964 -12.693554 0.000000
  93. GEO_new_pt create_name
  94. GET_RESULT res
  95. GEO_SET_PT create_name  res 19.383865 -11.311073 0.000000
  96. GEO_new_pt create_name
  97. GET_RESULT res
  98. GEO_SET_PT create_name  res 19.915789 -9.610106 0.000000
  99. GEO_new_pt create_name
  100. GET_RESULT res
  101. GEO_SET_PT create_name  res 20.173834 -6.616693 0.000000
  102. GEO_new_pt create_name
  103. GET_RESULT res
  104. GEO_SET_PT create_name  res 20.005552 -3.030877 0.000000
  105. GEO_new_pt create_name
  106. GET_RESULT res
  107. GEO_SET_PT create_name  res 18.837978 -0.190839 0.000000
  108. GEO_new_pt create_name
  109. GET_RESULT res
  110. GEO_SET_PT create_name  res 17.922512 2.787130 0.000000
  111. GEO_new_pt create_name
  112. GET_RESULT res
  113. GEO_SET_PT create_name  res 18.158844 6.427025 0.000000
  114. GEO_new_pt create_name
  115. GET_RESULT res
  116. GEO_SET_PT create_name  res 17.721783 8.367716 0.000000
  117. GEO_new_pt create_name
  118. GET_RESULT res
  119. GEO_SET_PT create_name  res 16.685152 9.985789 0.000000
  120. GEO_new_pt create_name
  121. GET_RESULT res
  122. GEO_SET_PT create_name  res 15.224818 10.868407 0.000000
  123. GEO_new_pt create_name
  124. GET_RESULT res
  125. GEO_SET_PT create_name  res 13.691008 10.976798 0.000000
  126. GEO_new_pt create_name
  127. GET_RESULT res
  128. GEO_SET_PT create_name  res 12.294318 11.398776 0.000000
  129. GEO_new_pt create_name
  130. GET_RESULT res
  131. GEO_SET_PT create_name  res 10.944631 11.237088 0.000000
  132. GEO_new_pt create_name
  133. GET_RESULT res
  134. GEO_SET_PT create_name  res 9.750000 10.250000 0.000000
  135. GEO_new_pt create_name
  136. GET_RESULT res
  137. GEO_SET_PT create_name  res 8.860128 10.382646 0.000000
  138. GEO_new_pt create_name
  139. GET_RESULT res
  140. GEO_SET_PT create_name  res 7.702986 9.619171 0.000000
  141. GEO_new_pt create_name
  142. GET_RESULT res
  143. GEO_SET_PT create_name  res 6.362327 7.184775 0.000000
  144. GEO_new_pt create_name
  145. GET_RESULT res
  146. GEO_SET_PT create_name  res 6.123492 5.074854 0.000000
  147. GEO_new_pt create_name
  148. GET_RESULT res
  149. GEO_SET_PT create_name  res 6.934156 3.425599 0.000000
  150. GEO_new_pt create_name
  151. GET_RESULT res
  152. GEO_SET_PT create_name  res 6.662047 1.565155 0.000000
  153. GEO_new_pt create_name
  154. GET_RESULT res
  155. GEO_SET_PT create_name  res 6.142643 0.995437 0.000000
  156. GEO_new_pt create_name
  157. GET_RESULT res
  158. GEO_SET_PT create_name  res 5.268900 0.646514 0.000000
  159. GEO_new_pt create_name
  160. GET_RESULT res
  161. GEO_SET_PT create_name  res 4.216913 0.547795 0.000000
  162. GEO_new_pt create_name
  163. GET_RESULT res
  164. GEO_SET_PT create_name  res 3.162778 0.728691 0.000000
  165. GEO_new_pt create_name
  166. GET_RESULT res
  167. GEO_SET_PT create_name  res 2.282589 1.218614 0.000000
  168. GEO_new_pt create_name
  169. GET_RESULT res
  170. GEO_SET_PT create_name  res 1.752442 2.046974 0.000000
  171. GEO_new_pt create_name
  172. GET_RESULT res
  173. GEO_SET_PT create_name  res 1.720127 2.309377 0.000000
  174. GEO_new_pt create_name
  175. GET_RESULT res
  176. GEO_SET_PT create_name  res 1.696424 2.740498 0.000000
  177. GEO_new_pt create_name
  178. GET_RESULT res
  179. GEO_SET_PT create_name  res 1.786568 3.453568 0.000000
  180. GEO_new_pt create_name
  181. GET_RESULT res
  182. GEO_SET_PT create_name  res 1.996624 4.400958 0.000000
  183. GEO_new_pt create_name
  184. GET_RESULT res
  185. GEO_SET_PT create_name  res 2.305842 5.675383 0.000000
  186. GEO_new_pt create_name
  187. GET_RESULT res
  188. GEO_SET_PT create_name  res 2.770050 7.529334 0.000000
  189. GEO_new_pt create_name
  190. GET_RESULT res
  191. GEO_SET_PT create_name  res 3.507102 10.145834 0.000000
  192. GEO_new_pt create_name
  193. GET_RESULT res
  194. GEO_SET_PT create_name  res 3.990979 12.549021 0.000000
  195. GEO_new_pt create_name
  196. GET_RESULT res
  197. GEO_SET_PT create_name  res 3.660390 13.914655 0.000000
  198. GEO_new_pt create_name
  199. GET_RESULT res
  200. GEO_SET_PT create_name  res 2.737829 14.604043 0.000000
  201. GEO_new_pt create_name
  202. GET_RESULT res
  203. GEO_SET_PT create_name  res 2.000000 15.000000 0.000000
  204.  
  205. Pol_Schliessen Kopf2
  206.  
  207. GEO_SELECT_ALL_PTS KOPF2
  208.  
  209. PLOT_PKL
  210.  
  211. Return 1